<?php

class CacheTest extends SapphireTest {

    public function setUpOnce() {
        parent::setUpOnce();
        Versioned::set_reading_mode('Stage.Live');
    }

    public function testCacheBasics() {
		$cache = SS_Cache::factory('test');

		$cache->save('Good', 'cachekey');
		$this->assertEquals('Good', $cache->load('cachekey'));
	}

	public function testCacheCanBeDisabled() {
		SS_Cache::set_cache_lifetime('test', -1, 10);

		$cache = SS_Cache::factory('test');

		$cache->save('Good', 'cachekey');
		$this->assertFalse($cache->load('cachekey'));
	}

	public function testCacheLifetime() {
		SS_Cache::set_cache_lifetime('test', 0.5, 20);

		$cache = SS_Cache::factory('test');
		$this->assertEquals(0.5, $cache->getOption('lifetime'));

		$cache->save('Good', 'cachekey');
		$this->assertEquals('Good', $cache->load('cachekey'));

		// As per documentation, sleep may not sleep for the amount of time you tell it to sleep for
		// This loop can make sure it *does* sleep for that long
		$endtime = time() + 2;
		while (time() < $endtime) {
			// Sleep for another 2 seconds!
			// This may end up sleeping for 4 seconds, but it's awwwwwwwright.
			sleep(2);
		}

		$this->assertFalse($cache->load('cachekey'));
	}

	public function testCacheSeperation() {
		$cache1 = SS_Cache::factory('test1');
		$cache2 = SS_Cache::factory('test2');

		$cache1->save('Foo', 'cachekey');
		$cache2->save('Bar', 'cachekey');
		$this->assertEquals('Foo', $cache1->load('cachekey'));
		$this->assertEquals('Bar', $cache2->load('cachekey'));

		$cache1->remove('cachekey');
		$this->assertFalse($cache1->load('cachekey'));
		$this->assertEquals('Bar', $cache2->load('cachekey'));
	}

	public function testCacheDefault() {
		SS_Cache::set_cache_lifetime('default', 1200);
		$default = SS_Cache::get_cache_lifetime('default');

		$this->assertEquals(1200, $default['lifetime']);

		$cache = SS_Cache::factory('somethingnew');

		$this->assertEquals(1200, $cache->getOption('lifetime'));
	}

	public function testVersionedCacheSegmentation() {
        $cacheInstance = SS_Cache::factory('versioned');
        $cacheInstance->clean();

        Versioned::set_reading_mode('Stage.Live');
        $result = $cacheInstance->load('shared_key');
        $this->assertFalse($result);
        $cacheInstance->save('uncle', 'shared_key');
        // Shared key is cached on LIVE
        $this->assertEquals('uncle', $cacheInstance->load('shared_key'));

        Versioned::set_reading_mode('Stage.Stage');

        // Shared key does not exist on STAGE
        $this->assertFalse($cacheInstance->load('shared_key'));

        $cacheInstance->save('cheese', 'shared_key');
        $cacheInstance->save('bar', 'stage_key');

        // Shared key has its own value on STAGE
        $this->assertEquals('cheese', $cacheInstance->load('shared_key'));
        // New key is cached on STAGE
        $this->assertEquals('bar', $cacheInstance->load('stage_key'));

        Versioned::set_reading_mode('Stage.Live');

        // New key does not exist on LIVE
        $this->assertFalse($cacheInstance->load('stage_key'));
        // Shared key retains its own value on LIVE
        $this->assertEquals('uncle', $cacheInstance->load('shared_key'));

        $cacheInstance->clean();

    }

    public function testDisableVersionedCacheSegmentation() {
        $cacheInstance = SS_Cache::factory('versioned_disabled', 'Output', array('disable-segmentation' => true));
        $cacheInstance->clean();

        Versioned::set_reading_mode('Stage.Live');
        $result = $cacheInstance->load('shared_key');
        $this->assertFalse($result);
        $cacheInstance->save('uncle', 'shared_key');
        // Shared key is cached on LIVE
        $this->assertEquals('uncle', $cacheInstance->load('shared_key'));

        Versioned::set_reading_mode('Stage.Stage');

        // Shared key is same on STAGE
        $this->assertEquals('uncle', $cacheInstance->load('shared_key'));

        $cacheInstance->save('cheese', 'shared_key');
        $cacheInstance->save('bar', 'stage_key');

        // Shared key is overwritten on STAGE
        $this->assertEquals('cheese', $cacheInstance->load('shared_key'));
        // New key is written on STAGE
        $this->assertEquals('bar', $cacheInstance->load('stage_key'));

        Versioned::set_reading_mode('Stage.Live');
        // New key has same value on LIVE
        $this->assertEquals('bar', $cacheInstance->load('stage_key'));
        // New value for existing key is same on LIVE
        $this->assertEquals('cheese', $cacheInstance->load('shared_key'));

        $cacheInstance->clean();
    }

}